Attribute VB_Name = "modUIColorPalette"
' modUIColorPalette.bas
' Centralized UI color definitions for consistent styling across forms

Option Explicit

' Public color variables (must be initialized at runtime)
Public ltRed     As Long
Public ltGreen   As Long
Public ltBlue    As Long
Public ltYellow  As Long
Public ltGray    As Long
Public ltCyan    As Long
Public ltMagenta As Long
Public ltOrange  As Long
Public ltPurple  As Long
Public ltPink    As Long
Public ltTeal    As Long
Public ltBrown   As Long

' Call this once at startup (e.g., in Sub Main or Form_Load)
Public Sub InitUIColorPalette()
    ltRed = RGB(255, 182, 193)       ' Light red (pinkish)
    ltGreen = RGB(144, 238, 144)     ' Light green
    ltBlue = RGB(173, 216, 230)      ' Light blue
    ltYellow = RGB(255, 255, 224)    ' Light yellow
    ltGray = RGB(211, 211, 211)      ' Light gray
    ltCyan = RGB(224, 255, 255)      ' Light cyan
    ltMagenta = RGB(255, 182, 255)   ' Light magenta
    ltOrange = RGB(255, 200, 150)    ' Light orange
    ltPurple = RGB(216, 191, 216)    ' Light purple
    ltPink = RGB(255, 192, 203)      ' Light pink
    ltTeal = RGB(175, 238, 238)      ' Light teal
    ltBrown = RGB(222, 184, 135)     ' Light brown
End Sub


